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PREFACE 

This instant outlines the Sort/Merge system which is available 
under the following operating systems: 

Sort/Merge Version 4.6 operates under NOS 1 fpr the 
CONTROL DATA® CYBER 170 Series, CYBER 70 Models 
71, 72, 73, 74, and 6000 Series Computer Systems. 

Sort/Merge Version 4.6 operates under NOS/BE 1 for the 
CDC® CYBER 170 Series, CYBER 70 Models 71, 72, 73, 
74, and 6000 Series Computer Systems. 

Sort/Merge Version 1.0 operates under SCOPE 2 for the 
CONTROL DATA CYBER 170 Model 176, CYBER 70 
Model 76 and 7600 Computer Systems. 

The Sort/Merge record processing facility is available through 
the use of control statements and directives; user programs can 
call Sort/Merge with COMPASS assembly language macros, 
FORTRAN interface routine calls, or through the COBOL 
language. In this instant, material that applies exclusively to 
either Sort/Merge Version 1 or Sort/Merge Version 4 is noted 
accordingly in the text. 

This instant is written for a programmer familiar with the 
Sort/Merge facility and the operating system under which it is 
running as weU as the calling language. 

More detailed information can be found in the publications 
listed below. 



Publication 



Publication 
Number 



Sort/Merge Versions 4 and 1 
Reference Manual 



60497500 



CYBER Record Manager Basic 
Access Methods Version 1.5 
Reference Manual 

SCOPE 2 Reference Manual 



60495700 
60342600 



SCOPE 2 Record Manager 
Reference Manual 



60454690 



NOS/BE Version 1 
Reference Manual 



60493800 



NOS Version 1 
Reference Manual 
Volume 1 of 2 



60435400 
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COBOL Version 5 
Reference Manual 

FORTRAN Extended Version 4 
Reference Manual 

FORTRAN Version 5 
Reference Manual 

COMPASS Version 3 
Reference Manual 



60497100 
60497800 
60481300 
60492600 




CDC manuals can be ordered from Control Data Literature 
and Distribution Services, 308 Dale Street, St. Paul, 
Minnesota 55103. 
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INTRODUCTION 

Sort/Merge is a high-speed record processing program that 
manipulates and rearranges records into the order specified by 
the user. Record processing options include: 



Sort-only 
Merge-only 
Sort and Merge 



Sorts records from one or more input 
files. 

Combines a maximum of 100 presorted 
input files into one output file. 

Sorts input files and merges the output 
with presorted files. The combined 
number of input files and output files 
cannot exceed 100. 



Operations can be specified by a combination of control 
statements and Sort/Merge directives or by a series of macro 
calls. 



Directives 

SORT 

MERGE 

BYTESIZE 

FIELD 

FILE 

KEY 

SEQUENCE 

EQUATE 

OPTIONS 

OWNCODE 

TAPE 

END 



Macro Calls 

SORT 

MERGE 
BYTESIZE 

FILES 

KEY 

SEQUENCE 

EQUATE 

OPTIONS 

OWNCODE 

TAPE 

POINTER 

SMLIST 



Sort/Merge processing initiated by FORTRAN Extended calls is 
discussed in the section on FORTRAN Extended calls. 



SORT KEYS 

A sort key is a field of information within each record. The key 
is used to determine the order in which records are to be 
written to the output file. At least one sort key must be 
specified for each run; as many as 100 keys can be specified. 
Multiple keys can differ as to type, collating sequence, and sort 
order. 
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KEY LENGTH 

Key field length is specified on a FIELD directive or a KEY 
macro as the number of bytes and bits in the field. The length 
of a sort key must not exceed the minimum record length for 
any file. 

KEY POSITION 

Starting position of a sort key field, which is specified on a 
FIELD directive or KEY macro, can be anywhere within the 
record. The key must maintain the same position relative to 
the first character of each record in each file. Multiple fields 
can overlap. 

KEY TYPE 

Key type is specified on a FIELD directive or a KEY macro. 
Data in sort key fields can be: 



Logical (LOGICAL) 



Integer (INTEGER) 



Floating Point (FLOAT) 



Internal BCD (INTBCD) 



Display (DISPLAY) 



Unsigned binary integers of any 
length, sorted by magnitude. 

60-bit integers, starting any- 
where within the record, and 
sorted by numeric value. 

60-bit normalized or unnorma- 
lized floating point numbers, 
starting at any bit position 
within the record, and sorted by 
numeric value. 

Internal BCD character code, 
any integral number of char- 
acters in length, and sorted 
according to the specified col- 
lating sequence. 

Display code, any integral num- 
ber of characters in length, and 
sorted according to the speci- 
fied collating sequence. 







COLLATING SEQUENCE 

Collating sequence is specified on the KEY directive or KEY 
macro; it applies only to character data (key type INTBCD or 
DISPLAY), and can be any of the following: 

ASCII6 6-bit ASCII 

C0B0L6 6-bit COBOL 

DISPLAY 6-bit CDC display code 

INTBCD Internal BCD 
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The user can specify his own collating sequence with the colseq 
parameter on the SEQUENCE and EQUATE directives or 
macros. 

SORT ORDER 

Sort order for numeric or character keys can be specified on the 
KEY directive or macro as ascending or descending. 

SIGNED NUMERIC DATA 

Numeric data with a sign represented by an overpunch char- 
acter is indicated by the optional keyword SIGN on a FIELD 
directive or KEY macro or by t^SIGNt^ on the SMKEY call. The 
overpunched digit is normally the last digit of the field, but 
under Sort/Merge 4 it can be specified as the first digit by 
indicating the keyword LEADING. When the sign character is a 
digit without an overpunch, the value of the sort key is positive. 
Consequently, when the SIGN parameter is used, sort key values 
of 201, 20A, and 20J are equivalent to sort key values of +201, 
+201, and -201 respectively. 



Key Punch 


Sign 


Sign of 


Value of 


Code 


Character 

I 


Key Value 

+ 


Digit 


12-9 


9 


12-8 


H 


+ 


8 


12-7 


G 


+ 


7 


12-6 


F 


+ 


6 


12-5 


E 


+ 


5 


12-4 


D 


+ 


4 


12-3 


C 


+ 


3 


12-2 


B 


+ 


2 


12-1 


A 


+ 


1 


12-0 


< 


+ 





11-0 


V 


- 





11-1 


J 


- 


1 


11-2 


K 


- 


2 


11-3 


L 


- 


3 


11-4 


M 


- 


4 


11-5 


N 


- 


5 


11-6 





- 


6 


11-7 


P 


- 


7 


11-8 


Q 


- 


8 


11-9 


R 


- 


9 



Under Sort/Merge 4, a separate + or - sign can be specified for 
numeric data by including the keywords SIGN and SEPARATE 
on a FIELD directive or KEY macro or by specifying 
^SEPARATE^t on the SMKEY call. The separate sign of the 
value must always be the first or last character in the field, as 
indicated by the keyword LEADING or TRAILING. 
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SORT/MERGE DIRECTIVES 

Sort/Merg-e directives are structured according to the following 
rules: 

• Directives can begin in any column, but cannot extend 
beyond column 72. 

• Any number of continuation statements can be used. 
Each continuation must have a comma in column 1. 

• Any number of comment statements can be included. 
Comments require an asterisk in column 1. 

• User-defined parameters can consist of any number of 
alpha and numeric characters. The first character of 
the parameter must be alpha, and the first seven 
characters for each specification within a single 
Sort/Merge run input deck must be unique. 

Although alternative separators are accepted for some 
directives by Sort/Merge, the comma has been used 
throughout this manual. 






• 



• 



Em. bedded blanks are illegal in user-defined 
parameters. 



SORT 

SORT,VAR=type,LCMSB=ba 

Specifies sort-only or sort and merge processing. 

type Processing indicators: 

DISK Mass storage Sort/Merge 

(default) 

TAPE ) 

I POLYPHASE) Polyphase tape (Sort/Merge 4 

POLY ) °"^y^ 

I BALANCED^ Balanced tape (Sort/Merge 4 

BAL / only) 

ba Optional parameter designating total large core mem- 

ory (LCM) buffer area for all intermediate scratch 
I files (Sort/Merge 1 only). 

MERGE 

MERGE 
Specifies merge-only processing. 
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^^^, 



BYTESIZE 



BYTESIZE, n 



Specifies the number of bits per byte that are to be used by the 
FIELD directive. If this directive is omitted, six bits per byte is 
assumed. . 



Decimal number of bits per byte. 



FIELD 



FIELD, keyname (start, length, type, SIGN, location, 
SEPARATE) . . . , keyname (. . .)^ 

Specifies the starting position, length, and data type of a key 
field. At least one FIELD directive must be included in a 
Sort/Merge run; no more than 100 fields can be specified. Any 
sort key can be defined or referenced more than once during a 
single Sort/Merge run providing a new keyname is specified 



ea 



r*y\ "t-imQ "fViQ c?/^p+ Lroxj lo rla'PinoH 



ciiV' ovy 



rt 



y 



J.O VJ\^X X1JIV--V4. 



keyname, 
start. 



User-assigned sort key name. 



Starting position of the sort key: 

Byte number and number of the 
first bit within that byte in 
which the sort key first 
appears. Bytes and bits are 
numbered from 1; if either is 
omitted, 1 is assumed. 



byte 
.bit 
byte, bit 



length. 



typej 



SIGN 



location 



Length of the sort key: 

Number of bits and bytes in the 

sort key. A default value of six 

nbytes ) bits per byte is assumed unless 

.nbits /specified differently by the 

nbytes.nbits) BYTESIZE directive. A value 

of is assumed if either of 

these parameters is omitted. 

Sort key type identifier LOGICAL, INTEGER, 
FLOAT, INTBCD, or DISPLAY. 

Optional parameter for sort keys containing 
numeric data in display code. 

Optional position indicator, valid only if SIGN is 
used; LEADING or TRAILING (Sort/Merge 4 only). 



SEPARATE Optional parameter signifying sign is separate; 
valid only if SIGN is used (Sort/Merge 4 only). 
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KEY 

KEY, keyname(order,colseq);j^ , . . . ,keyname( . . . )n 

Specifies the order and collating sequence of keys. 

keynamej Sort key name; it must also be specified in the 

FIELD directive. 

order* 

1 Order in which keys are to be sorted and 

merged. Ascending order is assumed if the 

parameter is omitted. 

A = ascending order 
B = descending order 

colseqj User-specified collating sequence name specified 

in the SEQUENCE directive, or one of the 
standard collating sequence identifiers (ASCII6, 
C0B0L6, DISPLAY, or INTBCD). 

FILE 

FILE,type=name(action),name(action) , . . . ,type= . . . 

Specifies the files that are to be used. Only MERGE and 
OUTPUT file types can be specified for a merge run. SORT, 
MERGE, INPUT, and OUTPUT file types can be specified for a 
sort run. All files of a particular type must be specified in one 
group. 

type File type identifier: 

INPUT or SORT Sort input file 

MERGE Merge input file 

OUTPUT Sort or merge output file 

name Logical file name of a file to be processed by 

Sort /Merge. 

action System action to be performed after file 

processing is complete: 

C Close file 

R Rewind file 

U Unload file 

N No action 

CR Close and rewind file (default) 

RC Close and rewind file (default) 

CU Close and unload file 
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SEQUENCE 



SEQUENCE, colseq (c^, c^, . . . ,c^) 



Specifies the user's own collating sequence; or redefines the 
default to be a user collating sequence or one of the standard 
collating sequences. 

colseq Name of the user's collating sequence or one of 

the standard sequence identifiers (ASCIIS, 
COBOL6, DISPLAY, or INTBCD). If the param- 
eter is omitted, the collating sequence in paren- 
theses (c^, c^, . . . ) is used by Sort/Merge. 

c. Character or octal value specified in the sequence 

^ in which it is to appear in the user collating 

sequence. Characters or octal values not speci- 
fied are considered equal and collated after the 
specified characters or values. This parameter 
should be omitted when colseq specifies a stan- 
dard collating sequence. 

The octal value must not be followed by a B. 

If the following symbols are included in the user's 
collating sequence, they must be specif ied in the c 
parameter according to their octal equivalent: 

Display Code Internal BCD 

Character Octal Equivalent Octal Equivalent 



( 


51 


74 


) 


52 


34 


/ 


56 


73 


^ 


65 


75 
EQUATE 



EQUATE,colseq(c^,C2, . . . >%^(^i>^2' " ' '%^ 

Specifies two or more characters in the collating sequence as 
equal for comparison purposes. 

colseq ASCII6, C0B0L6, DISPLAY, INTBCD, or the 

name of the user-defined collating sequence. 

c Character or octal values to be equated. The 

collating positions of leading characters within 
the parentheses are equated to the collating 
position of the last character within the paren- 
theses. (See the discussion of the SEQUENCE 
directive for additional information on the speci- 
fication of characters or octal values.) 
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OPTIONS 

OPTIONS, option, option, . . . 

Specifies special record handling options. 




option VERIFY 



RETAIN 



Output file is checked for correct 
sequencing. If the order of records on the 
output file is incorrect, the job 
terminates and the output file is lost. 
When this option is omitted during a 
merge run, out-of-sequence records 
produce a nonfatal diagnostic and are 
included in the output file. 

Records with identical sort keys are 
sequenced according to the order in which 
they are read. When this option is 
omitted, records with equal sort keys are 
sequenced arbitrarily. 



VOLDUMP Checkpoint dump is taken when an 
end-of-volume condition on the input file 
or new-volume condition on the output 
file exists. A checkpoint file must have 
been previously requested (Sort/Merge 4 
only). 

DUMP(n) Checkpoint dump is taken when the 
specified number of records is read from 
the input file or the same number of 
records is written on the output file. If n 
is omitted, default is 50,000. A 
checkpoint file must have previously been 
requested (Sort/Merge 4 only). 




NODUMP No checkpoint dumps are 
(Sort /Merge 4 only). 



taken 




ORDER(n) Specifies the number of strings to be 
merged in core at one time. If core is not 
sufficient to merge at the order specified, 
a fatal error occurs. Default merge order 
is an installaticMi option (Sort/Merge 4 
only). 

COMPARE Key comparison technique is used 
internally for comparing sort keys 
(Sort/Merge 4 only). 

EXTRACT Key extraction technique is used 
internally for comparing sort keys 
(Sort/Merge 4 only). 
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^^ 



The COMPARE and EXTRACT options are mutually 
exclusive within a single sort. If neither option is 
specified, Sort/Merge attempts to choose the best 
technique. 

If more than one OPTIONS directive is specified, only 
the last OPTIONS directive specified applies. 
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OWNCODE 

OWNCODE, MRL=mrl, exitno^=entry^, . . . ,exitno^=entry^ 

Specifies entry point names for the user's relocatable owncode 
exit routines. 

mrl Maximum decimal record length in 6-bit char- 

acters. Required if an input file has not been 
specified. 

exitno. Number of the owncode exit. Owncode exit 6 is 

^ allowed only under Sort/Merge 4. | 

entry. Corresponding entry point name of the exit. 

TAPE 

TAPE, filename, filename, ... I 

Specifies that intermediate merge files are to be assigned to 
magnetic tapes. If files have not been defined in a previous job 
step, Sort/Merge issues requests for scratch tapes to be 
assigned to intermediate files as needed. (Sort/Merge 4 only.) | 

filename Logical file name assigned to intermediate merge 

file. 



END 

END 



Signifies the end of a Sort/Merge run. This directive is required 
and must be the last directive in each run. 



CYBER RECORD MANAGER FILE 
CONTROL STATEMENT 



A FILE control statement must be provided for every input and 
output file except INPUT, OUTPUT, and PUNCH under 
Sort/Merge 4. Under Sort/Merge 1, CF=N and OF=N must be | 
specified on FILE control statements for the special system 
files INPUT, OUTPUT, and PUNCH. 
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SORTMRG CONTROL STATEMENT 

Processing of Sort/Merge directives is initiated by the 
SORTMRG control statement. Parameters can be specified in 
any order or can be omitted. Sort/Merge supplies a default 
value for all omitted parameters. 



PARAMETERS 

SORTMRG (parameter list) 

Directive format Specifies the format of the Sort/Merge 

directives. 

6C Directives are in Sort/Merge 3 format. 

7C or ) 

.., -.} Directives are in Sort/Merge 4 format, 

omitted) ^ 




^^li 




Source input 

l=lfn ) 
. l=lfn/NRj 

l=:lfn/R 

1 

omitted 



Specifies the file on which the 
Sort/Merge directives are located. 

File (Ifn) is not rewound before opening. 

File (Ifn) is rewound before opening. 
Directives are on file COMPILE. 
Directives are on file INPUT. 



List file 



0=lfn 
0=lfn/NR 

0=lfn/R 

O or ) 
omitted/ 



Identifies the file to which listings out- 
put by Sort/Merge are written. These 
listings include directives, dayfile mes- 
sages, and any diagnostics. 

File (Ifn) is not rewound before opening. 

File (Ifn) is rewound before opening. 

Listings are written to file OUTPUT. 




Merge order 

MO=n 
omitted 



Specifies the intermediate merge order. 
Overrides specification on the OPTIONS 
directive. (Sort/Merge 4 only.) 

Merge order is 2 ^ n ^ 64. 

Merge order is based on available core. 
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Owncode file 



OWN=lfn 
OWN=lfn/NR 

OWN=lfn/R 

OWN 

omitted 



Specifies the file on which the owncode 
binaries are located. Sort/Merge reads 
this file after the directive file is read. 
Therefore, owncode binaries should be 
placed after directives in the job deck. 

File (Ifn) is not rewound before opening. 

File (Ifn) is rewound before opening. 
Owncode binaries are on file LGO. 
Owncode binaries are on file INPUT. 



SORTMRG 



This call is equivalent to: 

S0RTMRG(7C,I=INPUT/NR,0=0UTPUT/NR, 
0WN=INPUT/NR) 



SAMPLE INPUl STRUCTUKEb 



r 



r 



/- 



Binary Deck 



END 



/■ 



/" 



Sort/Merge Directives 



/SORTMRG Call 
>/ FILE Control Statements 



ACCOUNT Control Statementt 



Job Statement 



Uf required by the operating system 
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MACRO CALLS 

When specifying macro instructions, the user must ensure that: 

• A SORT or MERGE macro precedes all other macros. 

• Macros are specified in a continuous sequence. 

• Under Sort/Merge 1, the system control statement 
LIBRARY(SRTLIB) precedes the relocatable load of 
the macro binaries. 

• Under Sort/Merge 4, the control statement 
LIBRARY(COBOL) or LDSET(LIB=COBOL) precedes 
the relocatable load of the macro binaries. 

• The macros are not assembled with the COMPASS 
LIST M or F options because use of these options 
causes a large amount of source statements to be 
generated. 

• Under Sort/Merge 4, S=SMTEXT is included on the call 
for COMPASS assembly to ensure proper expansion of 
macros. 

• Under Sort/Merge 1, the control state m.ent ATTACH 
(SRTMACS, SRTMACS, ID=PRDLIB) precedes the 
COMPASS control statement and the COMPASS pro- 
gram includes the statement 

SRTMACS XTEXT 

with SRTMACS in the location field and XTEXT in the 
operation field. 

Sort/Merge macros are structured according to rules for 
formatting COMPASS macros. Since the parameter functions 
of macros and directives are usually identical, a detailed 
explanation of previously described parameters is not included 
in this section. (See -Sort/Merge Directives and Control 
Statement Requirements for detailed parameter functions.) 

SORT ba,MAXCM=n,CM=BELOWHHA 

Initiates Sort/Merge functions as a subprogram within a job 
requesting Sort/Merge processing. 



SORTB MAXCM=n,CM=BELOWHHA 

Specifies balanced processing under Sort/Merge 4. 

SORTP MAXCM=n,CM=BELOWHHA 

Specifies polyphase processing under Sort/Merge 4. 
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MERGE MAXCM=n,CM=BELOWHHA 

Specifies merge-only processing. 

The following parameters can be specified on the SORT macro 
call and its two alternate formats as well as on the MERGE 
macro call. 

MAXCM=n Required parameter specifying the maximum 

number of central memory words to be used 
by Sort/Merge for working storage. At least 
22000B words should be provided. If zero is 
specified, Sort/Merge uses a default size, 
n can specify a register. (Sort/Merge 4 only.) 

CM=BELOWHHA Optional parameter specifying that the 
Common Memory Manager preferentially 
allocates the working storage area for 
Sort/Merge between the last word address 
(LWA) of the last loaded overlay and the 
highest LWA of all overlays. If the param- 
eter is om.itted, the working storage area 
begins higher than the highest LWA of all 
overlays. (Meaningful only for overlay pro- 
grams under Sort/Merge 4.) 

BYTESIZE n 

Specifies the number of bits per byte. If the macro is omitted, 
six bits per byte is assumed. 

FILES (type,name,name),(type,name,. . .) 

Specifies input and output files. 

KEY bytepos,bitpos,nbytes,nbits,type,colseq,order, 

SIGN,location,SEPARATE 

Specifies sort key characteristics. A maximum of 100 sort keys 
can be specified in a run. 

bytepos Position of the first byte of the sort key in 

relation to the first byte of the record, counting 
from 1. (The default is 1.) 

bitpos Position of the first bit of the sort key in the byte 

indicated by bytepos, counting from 1. (The 
default is 1.) 

nbytes Number of complete bytes in the sort key. (The 

default is 0.) 

nbits Number of bits in the sort key, in addition to 

number of bytes specified in the previous param- 
eter. (The default is 0.) 
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SEQUENCE eolseq,(c,c, . . . ,),END 

Specifies the user's own collating sequence, or redefines as 
default a user collating sequence or a standard collating 
sequence. 

EQUATE colseq,(c,c, . . . ,),(c,c, . . .),END 

Specifies two or more characters as equal in a collating 
sequence for comparison purposes. 

OPTIONS option,option,. . . 

Specifies special record handling options. The options are: 
VERIFY, RETAIN, VOLDUMP, DUMP, NODUMP, ORDER, 
COMPARE, and EXTRACT. 

OWNCODE (MRL,mrl),(exitno,entry),(exitno, . . .) 

Specifies entry point names to relocatable owncode exit 
routines. Owncode exit 6 is allowed under Sort/Merge 4 only. 

TAPE filename, filename, . . . 

Specifies that intermediate merge files are to be assigned to 
magnetic tapes (Sort/Merge 4 only). 

POINTER addr 

Required with SMLIST macro to give SMLIST macro address 
(Sort/Merge 4 only). 

addr Address of an SMLIST macro. 

SMLIST macaddr,macaddr, . . . 

Specifies the addresses of Sort/Merge macros that need not 
exist in the sequence following the SORT macro; processed' only 
when a POINTER macro is encountered within a sequence 
following a SORT macro (Sort/Merge 4 only). 

macaddr Address of Sort/Merge macro: BYTESIZE, FILES, 

KEY, SEQUENCE, EQUATE, OPTIONS, OWN- 
CODE, or TAPE. 
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OWNCODE ROUTINES 

When entry to an owncode routine is initiated by the OWNCODE 
directive or the OWNCODE macro, the user should ensure that: 

• When- entry is initiated by the directive, the owncode 
routine has been assembled in relocatable binary form 
and, when necessary, is identified on the SORTMRG 
control statement. 

• When entry is initiated by the macro, the owncode 
routine is assembled in the program calling 
Sort/Merge, or is assembled and referenced in a 
program occupying core at the same time as the 
program calling Sort/Merge. 

Transfer to a user's owncode routine is accomplished with a 
return jump (RJ) which fiUs the entry point of the owncode 
routine with a return to Sort/Merge. To reestablish Sort/Merge 
control, the user normally jumps to the entry point of the 
owncode routine. The user can request specific processing 
action by jumping to an altered return address. 

Registers A2 and XO are used by Sort/Merge as a pointer to the 
current data record. Upon entry to all owncode exits, register 
A2 contains the address of the record and XO contains the 
record length. The user must ensure that the contents of these 
registers are accurate when control is returned to Sort/Merge 
during record insertion or record modification. 

FORTRAN Extended users should consult the section on 
FORTRAN Extended calls for information on owncode routines. 



EXIT 1: PROCESSING OF INPUT RECORDS 

Exit 1 is taken after each record is read from the input file or 
during a search for a new record when no input file is specified. 
This exit is not allowed in a merge-only run. 

Normal return address Sort/Merge accepts the current data 

record. 



Normal return address+1 Sort/Merge deletes the current input 

record. 

Normal return address+2 Sort/Merge inserts the user-speci- 
fied current data record. Control 
returns to exit 1 and the current 
input record remains unchanged 
until a normal return is executed or 
the record is deleted. 
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Normal return address+3 Sort/Merge terminates record input 

from the current input file and 
proceeds to the next input file. If 
the current file is the last, 
Sort/Merge proceeds to exit 2 (if 
specified), or to the merge phase. 



EXIT 2: PROCESSING OF INPUT FILES 

Exit 2 is taken after the last record is read from each file. This 
exit is not allowed in a merge-only run. 

Normal return address Sort/Merge proceeds to the next 

input file or to the merge phase. 

Normal return address+1 Sort/Merge inserts the user-speci- 
fied current data record after the 
last record read. Control returns to 
exit 2 until a normal return is 
executed. 



EXIT 3: PROCESSING OF OUTPUT RECORDS 

Exit 3 is taken before each record is moved into the final output 
area or when no output file has been specified. 

Normal return address Sort/xMerge writes the current out- 

put record. 



Normal return address+1 Sort/Merge deletes the output 

record. 



Normal return address+2 Sort/Merge inserts the user-speci- 
fied current data record. Control 
returns to exit 3, and the current 
output record remains unchanged 
until a normal return is executed or 
the record is deleted. 

Normal return address+3 Sort/iMerge terminates record out- 
put to the current output file and 
proceeds with exit 4 (if specified), 
or normal end-of-file processing. 
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EXIT 4: PROCESSING OF OUTPUT FILES 

Exit 4 is taken after the last record is moved into the final 
output area. 



Normal return address 



Sort/Merge continues normal proc- 
essing by advancing to the end-of- 
file procedures for the output file. 



Normal return address+1 Sort/Merge inserts a user-specified 

current data record after the last 
record in the output area. Control 
returns to exit 4 until a normal 
return is executed. 



EXIT 5: PROCESSING OF DUPLICATE KEYS 

Exit 5 is taken when two records with equal sort keys are 
encountered. 



Normal return address 



Sort/Merge accepts two records: 
the current data record, and the 
record whose address and record 
length are contained in registers A3 
and X4. 



Normal return address+1 Sort/Merge deletes one of two 

records with equal sort keys. The 
user must ensure that the record to 
be retained has been designated as 
the current data record. 



EXIT 6: PROCESSING OF 
NONSTANDARD LABELS 



(Sort/Merge 4 only) 



Exit 6 is taken for all nonstandard input and output labels on 
files whose FILE control statements specify LT=NS, ULPt^NO. 

Normal return address Sort/Merge accepts a nonstandard 

label. 



Normal return address+1 



Sort/Merge accepts a nonstandard 
label. Control returns to exit 6 and 
Sort/Merge accepts additional non- 
standard labels until a normal return 
is executed. 
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OWNCODE ROUTINE SUMMARY 
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FORTRAN EXTENDED CALLS 

Sort/Merge processing can be initiated by a FORTRAN 
Extended program through special FORTRAN Extended call 
statements. 

CALL SMSORT(mrl,ba) 

CALL SMSORTB(mrl,ba) 

CALL SMSORTP(mrl,ba) 

CALL SMMERGE(mrl,ba) 

One of these statements must be the first call of any sort. 

SMSORT Specifies sort-only or sort and merge processing. 

SMSORTB Specifies a balanced tape sort under Sort/Merge 4. 

SMSORTP Specifies a polyphase tape sort under 
Sort/Merge 4. 

SMMERGE Specifies merge-only processing. 

mrl Maximum record length in characters of the 

record to be sorted. 

ba Under Sort/Merge 1, optional parameter desig- 

nating the number of words of large core memory 
(LCM) buffer area for all intermediate scratch 
files. 

Under Sort/Merge 4, optional parameter desig- 
nating the number of words of central memory to 
be used by Sort/Merge for working storage. If the 
parameter is omitted, the amount is computed by 
Sort/Merge. 

CALL SMFILE(smo,type,lfn,action) 

One call to SMFILE must be issued for each file used during 
Sort/Merge processing with one exception: if the output file is 
handled by SMOWN, no call to SMFILE is required for that file. 

smo Specifies file processing: 

;^SORT^ 

;^MERGE;^ 

^OUTPUT^ 
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type 



Ifn 



action 




Indicates type of input/output used for file access: 

Formatted 



?^FORMATTED^ 
or 5^CODED^ 

?^BINARY^ 

(zero) 



Unformatted 

Record Manager inter- 
face routines 




File name can be a tape number or the name left- 
justified with zero fill (nLlfn). 

Indicates action to be taken with the file upon 
Sort/Merge completion: 

^REWIND^ 

^UNLOAD^ 

;^NONE^ (Default) 




CALL SMKEY(bytepos,bitpos,nbyte,nbits,type,colseq,order) 
One SMKEY call is required for each sort key. 

bytepos, Starting position of the sort key in relation to the 

bitpos first 6-bit byte of the record, counting from 1. 

bytepos gives the byte; bitpos gives the bit within 

the byte. 

nbyte, Length of the sort key in 6-bit bytes, or char- 

nbits acters (nbyte) plus bits (nbits). 

The remaining three parameters are optional: 

type Specifies type of code used to interpret keys 

(under Sort/Merge 4, type is a single option, 
except ;^LEADING^ or ^TRAILING ;^ can be used 
in any order with either ;^SIGN^ or ?^ SEPARATE?^ 
separated by commas): 




^DISPLAY^^ 
?^FLOAT^ 
^INTEGER^ 
^LOGICAL^ 



Internal display code 

Floating point data 

Signed integer data 

Unsigned integer data 
(default) 
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The following identifiers must be preceded by type 
/DISPLAY?^. The identifiers must be separated by commas as 
indicated. 



T^DISPLAY?^, 

5^ LEADING,^ 

9^DISPLAY?^, 

5^TR AILING?^ 

?^DISPLAY#, 

i^SEPARATE?^, 

T^LEADING^ 

T^DISPLAYi^, 
?^SEPARATE7^, 
?^TR AILING^ 



Numeric data in display code; + or - sign 
present as over punch at beginning of field 
(Sort/Merge 4 only). 

Numeric data in display code; + or - sign 
present as an over punch at the end of the 
field. 

Numeric data in display code, sign is a 
separate character at beginning of the 
field (Sort/Merge 4 only). 

Numeric data in display code; sign is a 
separate character at the end of the field 
(Sort/Merge 4 only). 



colseq 



order 



Name of the user-supplied collating sequence 
defined by an SMSEQ call, or one of the following 
collating sequences: 



T^ASCne^ 

T^DISPLAY?^ 

T^INTBCDt^ 

name 



6-bit AS on collating 
sequence (default for 
installations using ASCII 
character set) 

6-bit COBOL coUating 
sequence (default for 
installations using CDC 
character set) 



Internal display 
collating sequence 



code 



Internal BCD coUating 
sequence 

Name of a coUating 
sequence specified by a 
caU to SMSEQ 



A colseq parameter cannot be used unless the 
type parameter specifies ?^DISPLAY?^. 

Sequencing order for sort processing. It can be 
either of the foUowing: 



^A^ 
?^D^ 



Ascending (default) 
Descending 
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CALL SMSEQ(colseq,array) 

Specifies a user's collating sequence, or redefines the default to 
I be a user collating sequence. 

colseq ' Names the collating sequence being defined. 

array Name of the array containing characters in the 

order they are to be collated. Each character 
should be in nRx format (right-justified with zero 
fill or ijB format (octal). Unspecified characters 
coUate high and equal. The collating sequence is 
terminated by a negative number. 

CALL SMEQU(colseq, array) 

Specifies that two or more characters in the collating sequence 
are equal for comparison purposes. 

colseq Specifies the collating sequence containing tjie 

characters to be equated. 

array Name of the array specifying the characters to be 

equated. Each character should be in nRx format 
(right-justified with zero fill) or ijB format 
(octal). The end of the list of characters to be 
equated is indicated by a negative number. 

CALL SMOPT(option]; , . . . .optioUj^) 

Specifies special record handling options. The options are: 

/VERIEYi^ 

^RETAIN 7^ 

^VOLDUMP?^ 

i^DUMP^,n 

T^NODUMP^ 

^NODAY?^ 

?^ORDER7^,mo 

i^COMPARE^ 

i^EXTRACT?^ 

All of the above options except t^NODAY^ are explained in 
detail under directives. 

^NODAY# Specifies suppression of dayfile messages. 

CALL SMOWN(exitnumi,subname2,exitnum2,subname2) 

Specifies entry point names for the user's relocatable owncode 
routines. 
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exitnumj Number of the owncode exit. 

subnamej Corresponding entry point name of the exit» 

CALL SMRTN(retaddr,ai,rli,bi,rli) 

This call is used to return to Sort/Merge processing from the 
user's owncode routine when the owncode routine is a 
FORTRAN Extended subroutine. 

retaddr Specifies normal return address or altered return 

address to continue Sort/Merge processing. 

aj Specifies the integer array where Sort/Merge 

stores a record when subname is called. Storing 
into a causes indeterminate results. 

bj Specifies the integer array where the user stores 

a record when subname is called, b should not be 
the same as a. 

rl- 
1 Record length in characters. 

CALL SMTAPEdfni, . . . ,lfnn) 

This call is required for the tape variant of Sort/Merge 4 to 
specify all magnetic tape intermediate merge files. 

Ifnj Name assigned to an intermediate merge file. 

Each file name must be in nLln format 
(left -justified with zero fill) and must not be 
defined by the FORTRAN Extended program. 

CALL SMEND 

This call initiates Sort/Merge processing and must be the last 
call for any one sort or merge. 

CALL SMABT 

This caU terminates a sequence of Sort/Merge interface caUs 
without initiating execution of Sort/Merge. 
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FORTRAN 5 CALLS 

Sort/Merge processing can be initiated by a FORTRAN 5 
program through special FORTRAN 5 call statements. 

CALL SMSORT (mrl.ba) 

CALL'sMSORTB (mrl.ba) 

CALL SMSORTP (mrl,ba) 

CALL SMMERGE (mrl,ba) 

One of these statements must be the first call of any sort. 

SMSORT Specifies sort-only or sort and merge processing. 

SMSORTB Specifies a balanced tape sort under Sort/Merge 4. 

SMSORTP Specifies a polyphase tape sort under 
Sort/Merge 4. 

SMMERGE Specifies merge-only processing. 

mrl Maximum record length in characters of record to 

be sorted. 

ba Under Sort/Merge 1, optional parameter 

designating the number of words of large core 
memory (lCM) used as a buffer area for all 
intermediate scratch files. 

Under Sort/Merge 4, optional parameter 
designating the number of words of Central 
Memory to be used by Sort/Merge for working 
storage. If the parameter is omitted, the amount 
is computed by Sort/Merge. 

CALL SMFILE(dis,i/o,lfn,action) 

One call to SMFILE must be issued for each file used during 
Sort/Merge processing with one exception: if the output file is 
handled by SMOWN, no caU to SMFILE is required for that file. 

dis Specifies file processing: 

'SORT' 

'MERGE' 

'OUTPUT' 
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i/o 



Indicates type of input/output used for file access: 

Formatted 



'FORMATTED' 
or 'CODED' 

'BINARY' 

(zero) 



Unformatted 

CYBER Record Manager 
interface routines 



Ifn 



action 



File name can either be a tape number or the 
name left justified with zero fill. For 
Sort/Merge 4 when i/o is specified as zero, Ifn 
can be an array containing the file information 
table. 

Indicates action to be taken with the file upon 
Sort/Merge completion: 



'REWIND' 

'UNLOAD' 

'NONE' (default) 

CALL SMKEY(charpos,bitpos,nchar,nbits,type,colseq,order) 

charpos Starting position of the sort key in relation to the 

bitpos first 6-bit byte of the record, counting from 1. 

Charpos gives the position of the first character; 

bitpos specifies the bit within the character (or 

6-bit byte) specified by charpos. 

nchar Length of the sort key in 6-bit bytes, or characters 

nbits (nchar) plus bits (nbits). 

The remaining three parameters are optional: 

type Specifies type of code used to interpret keys: 



'DISPLAY' 
'FLOAT' 
INTEGER' 
'LOGICAL' 



Internal display code 

Floating point data 

Signed integer data 

Unsigned integer 
(default) 



data 
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The following identifers must be preceded by type 'DISPLAY'. 
The identifiers must be separated by commas as indicated. 



'DISPLAY', 

'SIGN', 

'LEADING' 

'DISPLAY', 

'SIGN', 

'TRAILING' 

'DISPLAY' 

'SEPARATE', 

'LEADING' 

'DISPLAY', 

'SEPARATE', 

'TRAILING' 

colseq 



'ASCIIS' 

'C0B0L6' 

'DISPLAY' 

'INTBCD' 

name 



order 



Numeric data in display code; + or 
sign present as overpunch at 
beginning of field (Sort/Merge 4 only). 

Numeric data in display code; + or 
sign present as overpunch at end 
of field. 

Numeric data in display code; sign 
is a separate character at 

beginning of field (Sort/Merge 4 only). 

Numeric data in display code; sign 
is a separate character at end of 
field (Sort/Merge 4 only). 

Name of the user-supplied collating sequence 
defined by a SMSEQ call, or one of the 
following collating sequences. 

6-bit ASCII collating sequence (default for 
installations using ASCII character set). 

6-bit COBOL collating sequence (default for 
installations using CDC character set). 

Internal display code collating sequence. 

Internal BCD collating sequence. 

Name of a collating sequence specified in a 
call to SMSEQ. 

A colseq parameter cannot be used unless the 
type parameter specifies 'DISPLAY'. 

Sequencing order for sort processing. It can 
be either of the following: 






'A' 
'D' 



Ascending (default) 
Descending 




CALL SMSEQ(segname,segspec) 

Specifies a user's collating sequence or redefines the 
default to be a user collating sequence. 

segname Names the collating sequence being defined. 
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segspec Names the integer array containing the 

characters in the order they are to be collated. 
Each character should be in nR"s" format 
(right-justified with zero fill) or 0"o" format 
(octal). Unspecified characters collate high and 
equal. The collating sequence is terminated by a 
negative number. 

CALL SMEQU(colseg,equspec) 

Specifies that two or more characters in the collating sequence 
are equal for comparison purposes. 

colseq Specifies the collating sequence containing the 

characters to be equated. 

equspec Name of the array specifying the characters to be 

equated. Each character should be in nR"s" 
format (right-justified with zero fill) or 0"o" 

frinmot ^rtrt■^Q^^ Tho onH nf fho lict nf r»hprnnteT*S 

to be equated is indicated by a negative number. 



CALL SMOPT(opt ,opt ,...) 

Specifies special record handling options. The options are: 

'VERIFY' 

'RETAIN' 

'VOLDUMP' 

'DUMP',n 

'NODUMP' 

'NODAY' 

'ORDER',mo 

'COMPARE' 

'EXTRACT' 

All of the above options except 'NODAY' are explained in detail 
under directives. 

'NODAY' Specifies suppression of dayfile messages. 

CALL SMOWN(exitnum]^,subname-[^,exitnum2,subname2) 

Specifies entry point names for the user's relocatable owncode 
routines. 

exitnum^ Number of the owncode exit. 

subnamej Corresponding entry point name of the exit. 
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CALL SMRTN(petaddr,ai,rli,bi,rlx) 

This call is used to return to Sort/Merge processing from the 
user's owncode routine when the owncode routine is a 
FORTRAN 5 subroutine. 

retaddr Specifies normal return address or altered return 

address to continue Sort/Merge processing. 

aj Specifies the integer array where Sort/Merge 

stores a record when subname is called. Storing 
into a causes indeterminate results. 

bj Specifies the integer array where the user stores 

a record when subname is called, b should not be 
the same as a. 

rl Record length in characters. 

CALL SMTAPECtaplist) 

This call is required for the tape variant of Sort/Merge 4 to 
specify all magnetic tape intermediate merge files. 

taplist List of logical file names, each in the form 

L"filename". The file names in taplist must not 
be declared in the PROGRAM statement. 

CALL SMEND 

This call initiates Sort/Merge processing and must be the last 
call for any one sort or merge. 

CALL SMABT 

This call terminates a sequence of Sort/Merge interface 
calls without initiating execution of Sort/Merge. 
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31 


2 


2 


35 


2 


02 


2 


32 


3 


3 


36 


3 


03 


3 


33 


4 


4 


37 


4 


04 


4 


34 


5 


5 


40 


5 


05 


5 


35 


6 


6 


41 


6 


06 


6 


36 


7 


7 


42 


7 


07 


7 


37 
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CDC 
Graphic 


ASCII 
Graphic 
Subset 


Display 
Code 


Hollerith 
Punch 
(026) 


External 
BCD 
Code 


ASCII 
Punch 
(029) 


ASCI! 
Code 
















8 


8 


43 


8 


10 


8 


38 


9 


9 


44 


9 


11 


9 


39 


+ 


+ 


45 


12 


60 


12-8-6 


28 


- 


- 


46 


11 


40 


11 


2D 


* 


* 


47 


11-8-4 


54 


11-8^ 


2A 


/ 


/ 


50 


0-1 


21 


0-1 


2F 


{ 


( 


51 


0-8-4 


34 


1 2-8-5 


28 


) 


) 


52 


12-8-4 


74 


11-8-5 


29 


$ 


$ 


53 


11-8-3 


53 


11-8-3 


24 


= 


= 


54 


8-3 


13 


8-6 


3D 


blank 


blank 


55 


no punch 


20 


no punch 


20 


(comma) 


(comma) 


56 


0-8-3 


33 


0-8-3 


2C 


(period) 


(period) 


57 


1 2-8-3 


73 


12-8-3 


2E 


= 


# 


60 


0-8-6 


36 


8-3 


23 


[ 


[ 


/^ 


8-7 


17 


1 2-8-2 


5B 


] 


] 


62 


0-8-2 


32 


11-8-2 


5D 


%^ 


% 


63 


8-6 


16 


0-8^ 


25 


# 


(quote) 


64 


8-4 


14 


8-7 


22 


-> 


— (underline) 


65 


0-8-5 


35 


0-8-5 


5F 


V 


1 


66 


11-0 


52 


12-8-7 


21 


A 


& 


67 


0-8-7 


37 


12 


26 


t 


' (apostrophe) 


70 


11-8-5 


55 


8-5 


27 


4- 


? 


71 


11-8-6 


56 


0-8-7 


3F 


< 


< 


72 


12-0 


72 


12-8-4 


3C 


> 


> 


73 


11-8-7 


57 


0-8-6 


3E 


< 


@ 


74 


8-5 


15 


8-4 


40 


> 


\ - 


75 


1 2-8-5 


75 


0-8-2 


5C 


—' 


'-^^(circumflex) 


76 


12-8-6 


76 


11-8-7 


5E 


; (semicolon) 


; (semicolon) 


77 


12-8-7 


77 


11-8-6 


38 


Twelve or m 


ore zero bits at the end of a 


60-bit word are interprei 


ed as end-of 


-line 


mark rather 


than two colons. End-of-li 


ie mark is converted to e> 


eternal BCD 


1632. 


In installatio 


ns using the CDC 63-graphi 


: set, display code 00 has 


no associatec 


i graphic 


or Hollerith 


code; display code 63 is the 


colon (8-2 punch). 












30 
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STANDARD COLLATING SEQUENCES 



»<- 



COBOL6' 



Graphics 



blank 

o/t 
/o 



A 

t 

> 



< 

A 
B 
C 
D 
E 
F 
G 
H 
I 



Display 
Code 



55 

74t 

63 

61 

65 

60 

67 

70 

71 

73 

75 

76 

57 

52 

77 

45 

53 
47 
46 
50 
56 
51 
54 
64 
72 
01 
02 
03 
04 
05 
06 
07 
10 
11 



Display 



Graphics 



.t 

A 

B 

C 

D 

E 

F 

G 

H 

i 

J 

K 

L 

M 

N 



P 

Q 

R 

S 

T 

U 

V 

W 

X 

Y 

Z 



1 

2 
3 
4 



Display 
Code 



00' 

01 

02 

03 

04 

05 

06 

07 

10 

11 

12 

13 

14 

15 

16 

17 

20 

21 

22 

23 

24 

25 

26, 

27 

30 

31 

32 

33 

34 

35 

36 

37 

40 



INTBCD 



Graphics 



< 

/o 

[ 
+ 

A 

B 

C 

D 

E 

F 

G 

H 

I 

< 



> 



CDC 
INTBCD 



00 

01 

02 

03 

04 

05 

06 

07 

10 

11 

12 

13 

14 

15 

16 

17 

20 

21 

22 

23 

24 

25 

26 

27 

30 

31 

32 

33 

34 

35 

36 

37 

40 



ASCIIS 



tt 



Graphics 



blank 
I 
II 

# 
$ 

o/tt 



< 
> 

? 



Display 
Code 



55 

66 

64 

60 

53 

63 

67 

70 

51 

52 

47 

45 

56 

46 

57 

50 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

00 

77 

72 

54 

73 

71 

74 
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C0B0L6+ 


Display^ 


INTBCD 


ASCI 16'''"'^ 


Graphics 


Display 
Code 


Graphics 


Display 
Code 


Graphics 


CDC 
IWTBCD 


Graphics 


Display 
Code 


V 


66 


6 


41 


J 


41 


A 


01 


J 


12 


7 


42 


K 


42 


B 


02 


K 


13 


8 


43 


L 


43 


C 


03 


L 


14 


9 


44 


M 


44 


D 


04 


M 


15 


+ 


45 


N 


45 


E 


05 


N 


16 


- 


46 





46 


F 


06 





17 


* 


47 


P 


47 


G 


07 


P 


20 


/ 


50 


Q 


50 


H 


10 


Q 


21 


( 


51 


R 


51 


1 


11 


R 


22 


) 


52 


"V 


52 


J 


12 


] 


62 


$ 


53 


$ 


53 


K 


13 


S 


23 


- 


54 


* 


54 


L 


14 


T 


24 


blank 


55 


t 


55 


M 


15 


U 


25 




56 


i 


56 


N 


16 


V 


26 




57 


> 


57 





17 


w 


27 


= 


60 


blank 


60 


P 


20 


X 


30 


[ 


61 


/ 


61 


Q 


21 


Y 


31 


] 


62 


S 


62 


R 


22 


z 


32 


%t 


63"'' 


T 


63 


S 


23 




00"*" 


^ 


64 


U 


64 


T 


24 





33 


-> 


65 


V 


65 


U 


25 


1 


34 


V 


66 


w 


66 


V 


26 


2 


35 


A 


67 


X 


67 


w 


27 


3 


36 


t 


70 


Y 


70 


X 


30 


4 


37 


i 


71 


z 


71 


Y 


31 


5 


40 


< 


72 


] 


72 


z 


32 


6 


41 


> 


73 


> 


73 


I 


61 


7 


42 


< . 


74 


( 


74 


\ 


75 


8 


43 


> 


75 


-)■ 


75 


] 


62 


9 


44 


—1 


76 


= 


76 


^ 


76 






; 


77 


A 


77 


- 


65 


"•"Under the CDC e 


53-character set, the 


-e is no percent graphic; the colon is 


display code 63. 


Display code 00 is 


not used. 


ttunder the ASCII 


63-character set, th 


ere is no percent graphic; the colon col- 


lates in position 


35, not position 32. 
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